home *** CD-ROM | disk | FTP | other *** search
/ Workplace Effectiveness: Critical Thinking Skills / Workplace Effectiveness: Critical Thinking Skills.iso / pc / Files / Rewind.dxr / 00003_Navigation handlers.ls < prev    next >
Encoding:
Text File  |  1998-09-14  |  825 b   |  26 lines
  1. global gMasterData, gSection, gMusicData
  2.  
  3. on goIntro
  4.   go(label("intro"))
  5.   goNarrator(gMasterData, "38")
  6.   set gSection to #intro
  7. end
  8.  
  9. on goKeyboard
  10.   go("keyboard")
  11.   goNarrator(gMasterData, "39")
  12.   set gSection to #keyboard
  13.   set gMusicData to [#trackChoice: [], #trackNum: 0, #noteChoices: [], #currentSound: 0, #trackArt: 4, #sequenceArt: 38]
  14.   puppetSprite(the trackArt of gMusicData, 1)
  15.   setPuppetState([26, 37], #c, 1)
  16.   setFingerCursor(#on, [3, 5, 6, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25])
  17.   preloadMember(member "note1", "note17")
  18. end
  19.  
  20. on exitKeyboard
  21.   puppetSprite(the trackArt of gMusicData, 0)
  22.   setPuppetState([26, 37], #c, 0)
  23.   setFingerCursor(#off, [3, 5, 6, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25])
  24.   unloadMember(member "note1", "note17")
  25. end
  26.